(jdb): Set gud-jdb-classpath-string to current

directory if CLASSPATH is not set.

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index f2e3a54459e2aff7a332466d7b70170d6eb5f83e..c20f5adeefc4976b14df2c6e5c7cc83a5e54eebb 100644 (file)
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -2269,7 +2269,7 @@ gud, see `gud-mode'."
 
   ;; Set gud-jdb-classpath from the CLASSPATH environment variable,
   ;; if CLASSPATH is set.
-  (setq gud-jdb-classpath-string (getenv "CLASSPATH"))
+  (setq gud-jdb-classpath-string (or (getenv "CLASSPATH") "."))
   (if gud-jdb-classpath-string
       (setq gud-jdb-classpath
            (gud-jdb-parse-classpath-string gud-jdb-classpath-string)))